home *** CD-ROM | disk | FTP | other *** search
/ Aminet 32 / Aminet 32 (1999)(Schatztruhe)[!][Aug 1999].iso / Aminet / comm / ums / UMS11_9_beta.lha / UMS / Developer / m2 / UmsL.def < prev   
Text File  |  1998-07-14  |  3KB  |  83 lines
  1. DEFINITION MODULE UmsL{"ums.library",11};
  2.  
  3.  
  4. IMPORT d:UmsD,e:ExecD,R,u:UtilityD,s:SYSTEM;
  5.  
  6. CONST
  7.   umsMinVersion=11;
  8.   umsName="ums.library";
  9.  
  10. VAR
  11.   umsVersion:INTEGER;
  12.   umsBase:e.LibraryPtr;
  13.  
  14. (***  functions ***)
  15.  
  16. PROCEDURE Login(user{R.D2}    : d.STRPTR;
  17.                 passwd{R.D3}  : d.STRPTR): d.Account; CODE -30;
  18.  
  19. PROCEDURE Logout( account{R.D2} : d.Account);  CODE -36;
  20.  
  21. PROCEDURE ErrNum( account{R.D2} : d.Account): d.Error; CODE -120;
  22.  
  23. PROCEDURE ErrTxt( account{R.D2} : d.Account): d.STRPTR; CODE -126;
  24.  
  25. PROCEDURE DeleteMsg(account{R.D2} : d.Account;
  26.                     MsgNum{R.D3}  : d.MsgNum): BOOLEAN; CODE -132;
  27.  
  28. (*** V9 ***)
  29.  
  30. PROCEDURE ExportedMsg(acc{R.D2}   : d.Account;
  31.                       num{R.D3}   : d.MsgNum);  CODE -234;
  32.  
  33. PROCEDURE CannotExport( acc{R.D2}    : d.Account;
  34.                         num{R.D3}    : d.MsgNum;
  35.                         error{R.D4}  : d.STRPTR): BOOLEAN; CODE -240;
  36.  
  37. PROCEDURE VLog( acc{R.D2}    : d.Account;
  38.                 level{R.D4}  : LONGINT;
  39.                 format{R.D5} : d.STRPTR;
  40.                 args{R.D6}   : s.ADDRESS);  CODE -246;
  41.  
  42. PROCEDURE RLogin( server{R.D2} : d.STRPTR;
  43.                   user{R.D3}   : d.STRPTR;
  44.                   passwd{R.D4} : d.STRPTR): d.Account;  CODE -252;
  45.  
  46. PROCEDURE WriteMsg( acc{R.D2}     : d.Account;
  47.                     tagItems{R.D3}: u.TagItemPtr): d.MsgNum; CODE -258;
  48.  
  49. PROCEDURE ReadMsg(acc{R.D2}    : d.Account;
  50.                   tagItems{R.D3}: u.TagItemPtr): BOOLEAN; CODE -264;
  51.  
  52. PROCEDURE FreeMsg(acc{R.D2}    : d.Account;
  53.                   msgNum{R.D3} : d.MsgNum);  CODE -270;
  54.  
  55. PROCEDURE Select( acc{R.D2}     : d.Account;
  56.                   tagItems{R.D3}: u.TagItemPtr): LONGINT; CODE -276;
  57.  
  58. PROCEDURE Search( acc{R.D2}     : d.Account;
  59.                   tagItems{R.D3}: u.TagItemPtr): d.MsgNum; CODE -282;
  60.  
  61. PROCEDURE ReadConfig( acc{R.D2}: d.Account;
  62.                       tagItems{R.D3}: u.TagItemPtr): d.STRPTR; CODE -288;
  63.  
  64. PROCEDURE FreeConfig( acc{R.D2}    : d.Account;
  65.                       str{R.D3}    : d.STRPTR); CODE -294;
  66.  
  67. PROCEDURE WriteConfig(acc{R.D2}: d.Account;
  68.                       tagItems{R.D3}: u.TagItemPtr): BOOLEAN; CODE -300;
  69.  
  70. (*** V11 ***)
  71.  
  72. PROCEDURE ServerControl(sever{R.D2} : d.STRPTR;
  73.                         action{R.D3}  : LONGINT): d.Error; CODE -312;
  74.  
  75. PROCEDURE MatchConfig(acc{R.D2}     : d.Account;
  76.                       tagItems{R.D3}: u.TagItemPtr): BOOLEAN; CODE -318;
  77.  
  78. PROCEDURE ErrTxtFromNum(err{R.D2} : d.Error): d.STRPTR; CODE -324;
  79.  
  80. PROCEDURE DupAccount(acc{R.D2}: d.Account): d.Account; CODE -330;
  81.  
  82. END UmsL.lib11
  83.